/*
VC\XNvgiACRŁj
ftHgn͓łB
shiftL[ȂXNvgs{^Ɛݒʂo܂B
yahooVCURL𒼐ړ͂ĂB

ȓssURL ɂCӂœ͂ł܂B

Sapporo,
http://weather.yahoo.co.jp/weather/jp/1b/1400.html
Sendai,
http://weather.yahoo.co.jp/weather/jp/4/3410.html
Tokyo,
http://weather.yahoo.co.jp/weather/jp/13/4410.html
Nagoya,
http://weather.yahoo.co.jp/weather/jp/23/5110.html
Niigata,
http://weather.yahoo.co.jp/weather/jp/15/5410.html
Kanazawa,
http://weather.yahoo.co.jp/weather/jp/17/5610.html
Osaka,
http://weather.yahoo.co.jp/weather/jp/27/6200.html
Hiroshima,
http://weather.yahoo.co.jp/weather/jp/34/6710.html
Kochi,
http://weather.yahoo.co.jp/weather/jp/39/7410.html
Kagoshima,
http://weather.yahoo.co.jp/weather/jp/46/8810.html

*/




function getweather(URL){

		  http = new HTTP;
		  http.timeout=20;

	var area,w1,w2;
	try{
	  s=http.get(URL);
	  s=s.fromUTF8toSJIS();
	}finally{
	 http.disconnect();
	}
		if(s.match(/<title>(.*?) - /igm)){
			area=RegExp.$1;
		}
		
	s=s.substring(s.indexOf('<!---Today--->'),s.length);
		
	  list=s.match(/http:\/\/i.yimg.jp\/images\/weather\/general\/forecast\/.*?.gif/igm);


	  for (i=0;i<list.length;i++){
		
	  	list[i]=list[i].replace(/moon/ig,'sun');
	
		list[i].match(/forecast\/(.*?).gif/ig);
		
		if (i==0){ var w1 = RegExp.$1;  }
		if (i==1){ var w2 = RegExp.$1;  }
		if (i>=1)break;
	  }
	


		return new Array(w1,w2,area);

}



/*
main

*/


	ini=new Ini(Memo.id+'.ini');
	var AreaUrl=ini.read('setting','url','http://weather.yahoo.co.jp/weather/jp/13/4410.html');


if( Keyboard.shift){  //shift key ꂽݒ
	//setting

	s=prompt('Enter URL',AreaUrl);
  	if( s  ){
  		AreaUrl=s;
  		ini.write('setting','url',s);  ini.update();
  	}
  	
}




var sl=new Strings;

sl.add("<html><head>\n<meta http-equiv='Content-Type' content='text/html; charset=shift_jis'>\n</head>");
sl.add('<body link="#4C617C" text="#555555"><font size=2 face="MS UI Gothic">');




var wout=getweather(AreaUrl);


sl.add('<img src="img/weather.gif" border=0 align=middle> <b>weather</b> [' +wout[2]+ ']<br>');

sl.add('Today: <img src="img/' + wout[0] + '.gif" border=0 align=middle> / ');
sl.add('Tomorrow: <img src="img/' + wout[1] + '.gif" border=0 align=middle>');



sl.saveToFile('~temp.html');

Memo.ShowAsHtml('~temp.html');


d= new Date;
yobi=new Array('Sun','Mon','Tue','Wed','Thu','Fri','Sat');
Memo.title= yobi[d.getDay()]+' '+   format("%.2d",d.getHours())   +':'+ sprintf('%.2d',d.getMinutes());
Memo.text='wather script';


